Matrix Transformation

A = (0, 0)
B = (1, 0)
C = (1, 1)
D = (0, 1)
A1 = -1
B1 = 2
B2 = 3
A2 = 0
T1: {{A1, B1}, {A2, B2}}
A' = ApplyMatrix(T1, A)
B' = ApplyMatrix(T1, B)
C' = ApplyMatrix(T1, C)
D' = ApplyMatrix(T1, D)
Homer' = ApplyMatrix(T1, Homer)
a = Segment(A, B)
b = Segment(B, C)
c = Segment(C, D)
d = Segment(D, A)
e = Segment(A', B')
f = Segment(B', C')
g = Segment(C', D')
h = Segment(D', A')
text1: "$ \left(  \begin{array}{} " + (LaTeX[A1]) + " & " + (LaTeX[B1]) + " \\ " + (LaTeX[A2]) + " & " + (LaTeX[B2]) + " \\ \end{array}  \right)  $"